home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Compute! Gazette 1987 March
/
1987-03.d64
/
text sequencer
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-09-20
|
854b
|
22 lines
10 print"[147]creating ml file...":forx=0to167:reada:poke828+x,a:ck=ck+a:next
20 ifck<>19807thenprint"error in data statements.":stop
30 open1,8,1,"0:text seq.obj"
40 poke780,253:poke253,60:poke254,3:poke781,227:poke782,3:sys65496:close1
50 data 162,2,32,198,255,32,207,255,201,47
60 data 240,46,166,144,224,64,240,89,201,37
70 data 240,21,201,60,240,22,201,62,240,23
80 data32,210,255,166,197,234,224,3,240,18
90 data 76,65,3,169,5,76,90,3,169,30
100 data 76,90,3,169,159,76,90,3,32,127
110 data 3,32,176,3,76,65,3,160,0,185
120 data 182,3,240,7,32,210,255,200,76,129
130 data 3,165,197,234,141,228,3,201,60,240
140 data 25,173,228,3,201,1,240,3,76,141
150 data 3,32,167,3,104,104,96,169,2,32
160 data 195,255,32,204,255,96,169,147,32,210
170 data 255,96,13,5,32,211,208,193,195,197
180 data 32,194,193,210,154,32,212,79,32,195
190 data 79,78,84,73,78,85,69,44,5,32
200 data 210,197,212,213,210,206,154,32,70,79
210 data 82,32,205,69,78,85,159,0